inherited FRM_PesquisaProdutoCategoria: TFRM_PesquisaProdutoCategoria
  Left = 769
  Top = 218
  OldCreateOrder = True
  PixelsPerInch = 96
  TextHeight = 15
  inherited gbPadrao: TAdvGroupBox
    inherited edtPesquisar: TAdvEdit
      OnKeyDown = edtPesquisarKeyDown
    end
    inherited GridPesquisar: TJvDBGrid
      Columns = <
        item
          Expanded = False
          FieldName = 'COD_CATEGORIA'
          Title.Alignment = taCenter
          Title.Caption = 'C'#243'digo'
          Width = 42
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'DESCRICAO'
          Title.Alignment = taCenter
          Title.Caption = 'Descri'#231#227'o das Categorias Registradas'
          Width = 302
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'PERC_DESCTO'
          Title.Alignment = taCenter
          Title.Caption = '(%) Descto'
          Width = 59
          Visible = True
        end>
    end
    inherited pnlTitulo: TPanel
      Caption = 'Pesquisar Lista de Categorias para Produtos'
      inherited Image2: TImage
        Left = 22
      end
    end
  end
  inherited sqlPesquisar: TSQLQuery
    SQL.Strings = (
      'select'
      '  pg.cod_categoria,'
      '  pg.descricao,'
      '  pg.perc_descto'
      'from PRODUTO_CATEGORIA pg'
      'where pg.situacao = '#39'True'#39
      'order by pg.descricao')
  end
  inherited cdsPesquisar: TClientDataSet
    object cdsPesquisarCOD_CATEGORIA: TIntegerField
      Alignment = taCenter
      FieldName = 'COD_CATEGORIA'
      Required = True
    end
    object cdsPesquisarDESCRICAO: TStringField
      FieldName = 'DESCRICAO'
      Required = True
      Size = 100
    end
    object cdsPesquisarPERC_DESCTO: TFMTBCDField
      FieldName = 'PERC_DESCTO'
      DisplayFormat = ',0.00'
      EditFormat = ',0.00'
      currency = True
      Precision = 15
      Size = 2
    end
  end
end
